program ej;
begin
  cls;
  locate(10,5);
  writeChar( 'a' );
  locate ( 1 ,  10 );
  writeChar('c');
end.

